﻿Imports System
Imports System.Collections
Imports System.Configuration
Imports System.Data
Imports System.Linq
Imports System.Web
Imports System.Web.Security
Imports System.Web.UI
Imports System.Web.UI.HtmlControls
Imports System.Web.UI.WebControls
Imports System.Web.UI.WebControls.WebParts
Imports System.Xml.Linq
Imports BBDD

 _

Class informeDiario
   Inherits System.Web.UI.Page
   Protected Sub Page_Load(sender As Object, e As EventArgs)
        If Session("privUser") Is Nothing Or Integer.Parse(Session("privUser").ToString()) < 3 Then
            Response.Redirect("index.aspx")
        End If
      Me.listaInforme.Value = Consultas.getInforme()
   End Sub 'Page_Load 
End Class 'informeDiario